Accueil de la rubrique - Index alphabétique

Mode pas à pas : instruction EVALUATE

Ce programme utilise l’instruction EVALUATE, l'équivalent de CASE dans d'autres langages. Il permet d'exécuter différentes actions en fonction de la valeur d'une variable.

🔍 Explication ligne par ligne :

  • EVALUATE CODE : le programme vérifie la valeur de la variable CODE.
  • WHEN "A" : si la valeur est "A", il affiche « Niveau débutant ».
  • WHEN "B" : si la valeur est "B", il affiche « Niveau intermédiaire ».
  • WHEN "C" : si la valeur est "C", il affiche « Niveau avancé ».
  • WHEN OTHER : pour toutes les autres valeurs, il affiche « Code inconnu ».
  • END-EVALUATE : marque la fin de l’évaluation.
  • STOP RUN : arrêt du programme.
IDENTIFICATION DIVISION.
PROGRAM-ID. DemoEvaluate.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 CODE PIC X VALUE "B".

PROCEDURE DIVISION.
    EVALUATE CODE
        WHEN "A" DISPLAY "Niveau débutant"
        WHEN "B" DISPLAY "Niveau intermédiaire"
        WHEN "C" DISPLAY "Niveau avancé"
        WHEN OTHER DISPLAY "Code inconnu"
    END-EVALUATE.
    STOP RUN.
Cliquez sur « Suivant » pour exécuter chaque ligne et comprendre comment la valeur de CODE détermine l'affichage.

Valeur en mémoire

NomValeur
CODEB